This command will remove the object physically from any loops involving multi-object checking, used to increase performance in scenes that use a large quantity of redundant objects in memory.

EXCLUDE OBJECT ON Object ID

Object ID

Integer
The object number

This command does not return a value.

cls : sync on : sync rate 0 : hide mouse:cls 0

make object cone 1,10

xrotate object 1,90

fix object pivot 1

position object 1,0,0,140

AUTOMATIC OBJECT COLLISION 1,5,1

for t=2 to 100

make object sphere t,10

position object t,rnd(260)-130,0,rnd(260)-130

color object t,rgb(0,255,0)

yrotate object t,rnd(359.0)

if isodd(t)=0 then color object t,rgb(255,0,0)

next t

position camera 0,350,0

point camera 0,0,0

while mouseclick()=0

set cursor 0,0

print screen fps()

if leftkey()=1 then turn object left 1,1

if rightkey()=1 then turn object right 1,1

if upkey()=1 then move object 1,1

if downkey()=1 then move object 1,-1

if inkey$()="e" then for t=2 to 100:if isodd(t)=0:EXCLUDE OBJECT ON t:endif:next t

if inkey$()="i" then for t=2 to 100:if isodd(t)=0:EXCLUDE OBJECT OFF t:endif:next t

sync

endwhile

while mouseclick()=1:endwhile

delete objects 1,100

end

function isodd(a)

a=a && 1

endfunction a

BASIC3D Commands Menu
Index